#!"/Applications/XAMPP/xamppfiles/bin/perl"

package Order;

sub new
{
    my $class = shift;
    my $self = {
        _pizzaId => shift,
        _userId	 => shift,
        _status => shift,
        _shippingPrice => shift,
        _shippingTime => shift,
        _orderAddress => shift
    };
    bless $self, $class;
    return $self;
}

sub getPizzaId {
    my( $self ) = @_;
    return $self->{_pizzaId};
}

sub getUserId {
    my( $self ) = @_;
    return $self->{_userId};
}

sub getStatus {
    my( $self ) = @_;
    return $self->{_status};
}

sub getShippingPrice {
    my( $self ) = @_;
    return $self->{_shippingPrice};
}
sub getOrderAddress {
    my( $self ) = @_;
    return $self->{_orderAddress};
}

sub getShippingTime {
    my( $self ) = @_;
    return $self->{_shippingTime};
}
1;